home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 June / What PC June 1996.iso / data / showcase / i3demo.dir / 00075_OK_2UP.BMP.ls < prev    next >
Encoding:
Text File  |  1996-02-04  |  271 b   |  15 lines
  1. on mouseDown
  2.   puppetSprite(5, 1)
  3.   set the castNum of sprite 5 to 76
  4.   updateStage()
  5.   repeat while the stillDown
  6.     nothing()
  7.   end repeat
  8.   set the castNum of sprite 5 to 75
  9.   updateStage()
  10.   puppetSprite(5, 0)
  11.   if the mouseCast = 75 then
  12.     go(#next)
  13.   end if
  14. end
  15.